Code
#|
if (!exists("params")) {
params <- rmarkdown::yaml_front_matter("~/Documents_Local/git/IPBES_data_tsu/Assessments/Business/IPBES_BBA_Ch4-Snowball_Pilot_1/snowball.qmd")$params
}
# library(bibtex)
library(openalexR)Thank you for using openalexR!
To acknowledge our work, please cite the package by calling
`citation("openalexR")`.
Code
library(writexl)
library(tibble)
library(dplyr)
Attaching package: 'dplyr'
The following objects are masked from 'package:stats':
filter, lag
The following objects are masked from 'package:base':
intersect, setdiff, setequal, union
Code
library(ggplot2)
library(ggraph)
library(tidygraph)
Attaching package: 'tidygraph'
The following object is masked from 'package:stats':
filter
Code
library(knitr)
list.files(
"R",
full.names = TRUE,
recursive = TRUE
) |>
sapply(
FUN <- source
) R/plot_snowball.R R/to_xlsx.R
value ? ?
visible FALSE FALSE
Code
kp <- read.csv(file.path("Key Papers", params$key_paper))